Voorbeeld van de instructie Mid

Dit voorbeeld maakt gebruik van de instructie Mid om een opgegeven aantal tekens in een tekenreeksvariabele door tekens uit een andere tekenreeks te vervangen.

Dim MyString
MyString = "Een aap sprong"    ' Initialiseert tekenreeks.
Mid(MyString, 5, 3) = "kat"    ' MyString = "Een kat sprong".
Mid(MyString, 5) = "koe"    ' MyString = "Een koe sprong".
Mid(MyString, 5) = "koe springt over"    ' MyString = "Een koe spring".
Mid(MyString, 5, 3) = "eend"    ' MyString = "Een een spring".